From: Paul Eggert <eggert@cs.ucla.edu>
Date: Tue, 19 Sep 2017 08:47:39 +0000 (-0700)
Subject: Fix bug with make-directory on MS-Windows root
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~19^2~6667^2~39
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=1a01423b3c;p=emacs.git

Fix bug with make-directory on MS-Windows root

* lisp/files.el (files--ensure-directory): Treat any error, not
just file-already-exists, as an opportunity to check whether DIR
is already a directory (Bug#28508).
---

diff --git a/lisp/files.el b/lisp/files.el
index ff0ab706338..0c30d40c13b 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -5337,7 +5337,7 @@ instance of such commands."
   "Make directory DIR if it is not already a directory.  Return nil."
   (condition-case err
       (make-directory-internal dir)
-    (file-already-exists
+    (error
      (unless (file-directory-p dir)
        (signal (car err) (cdr err))))))